home *** CD-ROM | disk | FTP | other *** search
/ Aminet 25 / Aminet 25 (1998)(GTI - Schatztruhe)[!][Jun 1998].iso / Aminet / comm / mail / Monsoon090.lha / Install_Monsoon next >
Encoding:
Text File  |  1998-02-24  |  1.7 KB  |  76 lines
  1. ; Monsoon Beta Install Script V1.01 (28.11.97)
  2. ; © 1996 Gary Colville
  3. ;
  4.  
  5. ; -- SET UP STRINGS ---------------------------------------
  6. (set MSG_ASKDEST "Where would you like Monsoon to be installed?\nA drawer called Monsoon will be created.")
  7. (set MSG_COPY "Please Wait - Copying Files\n")
  8. (set MSG_THANKS "Monsoon Beta now installed!\n")
  9. (set mondir "")
  10.  
  11.  
  12. ; -- GET DESTINATION DIR ----------------------------------
  13. (set dest_dir
  14.   (tackon
  15.    (askdir (prompt MSG_ASKDEST ) 
  16.                    (help @askdir-help)
  17.                    (default @default-dest)
  18.    )
  19.    "Monsoon"
  20.   )
  21. )
  22.  
  23.  
  24. ; -- MAKE DIRECTORIES --------------------------------------
  25. (set @default-dest dest_dir)      
  26. (makedir dest_dir (infos))
  27. (makedir (tackon dest_dir "Areas"))
  28. (makedir (tackon dest_dir "Docs"))
  29. (makedir (tackon dest_dir "Data"))
  30. (makedir (tackon dest_dir "Rexx"))
  31.  
  32.  
  33. ; -- COPY FILES --------------------------------------------
  34. (copyfiles (prompt MSG_COPY)
  35.            (help @copyfiles-help)
  36.            (source "Monsoon")
  37.            (dest dest_dir)
  38.            (infos)
  39. )
  40.  
  41. (copyfiles (prompt MSG_COPY)
  42.            (help @copyfiles-help)
  43.            (source "Monsoon.Guide")
  44.            (dest dest_dir)
  45.            (infos)
  46. )
  47.  
  48. (copyfiles (prompt MSG_COPY)
  49.            (help @copyfiles-help)
  50.            (source "C/Punarc")
  51.            (dest "C:")
  52. )
  53.  
  54. (copyfiles (prompt MSG_COPY)
  55.            (help @copyfiles-help)
  56.            (source "S/Punarc.Cfg")
  57.            (dest "S:")
  58. )
  59.  
  60. (copyfiles (prompt MSG_COPY)
  61.            (help @copyfiles-help)
  62.            (source "Libs/Config.Library")
  63.            (dest "Libs:")
  64. )
  65.  
  66.  
  67. (copyfiles (prompt MSG_COPY)
  68.            (help @copyfiles-help)
  69.            (source "MUI")
  70.            (dest "MUI:Libs/mui")
  71.            (all)
  72. )
  73.  
  74. (exit MSG_THANKS)
  75. (exit)
  76.